home *** CD-ROM | disk | FTP | other *** search
/ Mac Power 1997 October / MACPOWER-1997-10.ISO.7z / MACPOWER-1997-10.ISO / AMUG / INTERNET / HTML Grinder 3.21.sit / HTML Grinder / Grinder Tools / AppleScript / cards.xml < prev    next >
Text File  |  1997-07-01  |  22KB  |  422 lines
  1. card_3823.xml
  2. <?xml version="1.0" encoding="utf-8" ?>
  3. <!DOCTYPE card PUBLIC "-//Apple, Inc.//DTD card V 2.0//EN" "" >
  4. <card>
  5.     <id>3823</id>
  6.     <filler1>0</filler1>
  7.     <cantDelete> <true /> </cantDelete>
  8.     <showPict> <true /> </showPict>
  9.     <dontSearch> <false /> </dontSearch>
  10.     <owner>3885</owner>
  11.     <link rel="stylesheet" type="text/css" href="stylesheet_3279.css" />
  12.     <part>
  13.         <id>8</id>
  14.         <type>button</type>
  15.         <visible> <true /> </visible>
  16.         <reserved5> 0 </reserved5>
  17.         <reserved4> 0 </reserved4>
  18.         <reserved3> 0 </reserved3>
  19.         <reserved2> 0 </reserved2>
  20.         <reserved1> 0 </reserved1>
  21.         <enabled> <true /> </enabled>
  22.         <rect>
  23.             <left>123</left>
  24.             <top>245</top>
  25.             <right>262</right>
  26.             <bottom>273</bottom>
  27.         </rect>
  28.         <style>default</style>
  29.         <showName> <true /> </showName>
  30.         <highlight> <false /> </highlight>
  31.         <autoHighlight> <true /> </autoHighlight>
  32.         <sharedHighlight> <true /> </sharedHighlight>
  33.         <family>0</family>
  34.         <titleWidth>0</titleWidth>
  35.         <icon>0</icon>
  36.         <textAlign>center</textAlign>
  37.         <font>Chicago</font>
  38.         <textSize>12</textSize>
  39.         <textStyle>plain</textStyle>
  40.         <name>Check Syntax</name>
  41.         <script>on mouseUpif the short name of me is "Check Syntax" thenget checksyntax()if it is "OK"then set the name of me to "Run AppleScript"else answer "There are syntax errors in your script. It is recommended that you compose and debug your script in a script editor," && ﾂｬ"and then paste your script into the AppleScript Wheel."elseif cd fld "thetext" is empty thenbeepanswer "There is no AppleScript to run."exit mouseupend ifprocessend ifend mouseUpon mouseenterif the short name of me is "Check Syntax"then helper "Click here to check the syntax for the above AppleScript."else helper "Click here to run the above AppleScript on each of the documents you dragged onto the Grinder."pass mouseenterend mouseenter</script>
  42.     </part>
  43.     <part>
  44.         <id>27</id>
  45.         <type>button</type>
  46.         <visible> <true /> </visible>
  47.         <reserved5> 0 </reserved5>
  48.         <reserved4> 0 </reserved4>
  49.         <reserved3> 0 </reserved3>
  50.         <reserved2> 0 </reserved2>
  51.         <reserved1> 0 </reserved1>
  52.         <enabled> <true /> </enabled>
  53.         <rect>
  54.             <left>332</left>
  55.             <top>250</top>
  56.             <right>365</right>
  57.             <bottom>272</bottom>
  58.         </rect>
  59.         <style>transparent</style>
  60.         <showName> <false /> </showName>
  61.         <highlight> <false /> </highlight>
  62.         <autoHighlight> <true /> </autoHighlight>
  63.         <sharedHighlight> <true /> </sharedHighlight>
  64.         <family>0</family>
  65.         <titleWidth>0</titleWidth>
  66.         <icon>21245</icon>
  67.         <textAlign>center</textAlign>
  68.         <font>Geneva</font>
  69.         <textSize>9</textSize>
  70.         <textStyle>plain</textStyle>
  71.         <name>nextwheel</name>
  72.         <script>on mouseenterhelpnextwheelpass mouseenterend mouseenteron mousedownchoosenextwheelend mousedown</script>
  73.     </part>
  74.     <part>
  75.         <id>5</id>
  76.         <type>field</type>
  77.         <visible> <true /> </visible>
  78.         <dontWrap> <false /> </dontWrap>
  79.         <dontSearch> <false /> </dontSearch>
  80.         <sharedText> <false /> </sharedText>
  81.         <fixedLineHeight> <false /> </fixedLineHeight>
  82.         <autoTab> <false /> </autoTab>
  83.         <lockText> <false /> </lockText>
  84.         <rect>
  85.             <left>12</left>
  86.             <top>54</top>
  87.             <right>369</right>
  88.             <bottom>206</bottom>
  89.         </rect>
  90.         <style>scrolling</style>
  91.         <autoSelect> <false /> </autoSelect>
  92.         <showLines> <false /> </showLines>
  93.         <wideMargins> <false /> </wideMargins>
  94.         <multipleLines> <false /> </multipleLines>
  95.         <reservedFamily> 0 </reservedFamily>
  96.         <titleWidth>0</titleWidth>
  97.         <icon>0</icon>
  98.         <textAlign>left</textAlign>
  99.         <font>Monaco</font>
  100.         <textSize>9</textSize>
  101.         <textStyle>plain</textStyle>
  102.         <textHeight>12</textHeight>
  103.         <name>TheText</name>
  104.         <script>on mouseenterhelper "In this field, type or paste the AppleScript you want to run on each of your HTML documents."pass mouseenterend mouseenteron closefieldset the name of cd btn 1 to "Check Syntax"end closefield</script>
  105.     </part>
  106.     <part>
  107.         <id>10</id>
  108.         <type>field</type>
  109.         <visible> <true /> </visible>
  110.         <dontWrap> <false /> </dontWrap>
  111.         <dontSearch> <false /> </dontSearch>
  112.         <sharedText> <false /> </sharedText>
  113.         <fixedLineHeight> <false /> </fixedLineHeight>
  114.         <autoTab> <false /> </autoTab>
  115.         <lockText> <true /> </lockText>
  116.         <rect>
  117.             <left>20</left>
  118.             <top>281</top>
  119.             <right>364</right>
  120.             <bottom>296</bottom>
  121.         </rect>
  122.         <style>transparent</style>
  123.         <autoSelect> <false /> </autoSelect>
  124.         <showLines> <false /> </showLines>
  125.         <wideMargins> <false /> </wideMargins>
  126.         <multipleLines> <false /> </multipleLines>
  127.         <reservedFamily> 0 </reservedFamily>
  128.         <titleWidth>0</titleWidth>
  129.         <icon>0</icon>
  130.         <textAlign>center</textAlign>
  131.         <font>Geneva</font>
  132.         <textSize>9</textSize>
  133.         <textStyle>plain</textStyle>
  134.         <textHeight>12</textHeight>
  135.         <name>UserName</name>
  136.         <script>on mouseenterreghelppass mouseenterend mouseenter</script>
  137.     </part>
  138.     <part>
  139.         <id>11</id>
  140.         <type>field</type>
  141.         <visible> <false /> </visible>
  142.         <dontWrap> <false /> </dontWrap>
  143.         <dontSearch> <false /> </dontSearch>
  144.         <sharedText> <false /> </sharedText>
  145.         <fixedLineHeight> <false /> </fixedLineHeight>
  146.         <autoTab> <false /> </autoTab>
  147.         <lockText> <true /> </lockText>
  148.         <rect>
  149.             <left>301</left>
  150.             <top>230</top>
  151.             <right>324</right>
  152.             <bottom>246</bottom>
  153.         </rect>
  154.         <style>transparent</style>
  155.         <autoSelect> <false /> </autoSelect>
  156.         <showLines> <false /> </showLines>
  157.         <wideMargins> <false /> </wideMargins>
  158.         <multipleLines> <false /> </multipleLines>
  159.         <reservedFamily> 0 </reservedFamily>
  160.         <titleWidth>0</titleWidth>
  161.         <icon>0</icon>
  162.         <textAlign>center</textAlign>
  163.         <font>Geneva</font>
  164.         <textSize>9</textSize>
  165.         <textStyle>plain</textStyle>
  166.         <textHeight>12</textHeight>
  167.         <name>hardserial</name>
  168.         <script>on mouseenterreghelppass mouseenterend mouseenter</script>
  169.     </part>
  170.     <part>
  171.         <id>13</id>
  172.         <type>field</type>
  173.         <visible> <false /> </visible>
  174.         <dontWrap> <false /> </dontWrap>
  175.         <dontSearch> <false /> </dontSearch>
  176.         <sharedText> <false /> </sharedText>
  177.         <fixedLineHeight> <false /> </fixedLineHeight>
  178.         <autoTab> <false /> </autoTab>
  179.         <lockText> <false /> </lockText>
  180.         <rect>
  181.             <left>20</left>
  182.             <top>216</top>
  183.             <right>64</right>
  184.             <bottom>238</bottom>
  185.         </rect>
  186.         <style>transparent</style>
  187.         <autoSelect> <false /> </autoSelect>
  188.         <showLines> <false /> </showLines>
  189.         <wideMargins> <false /> </wideMargins>
  190.         <multipleLines> <false /> </multipleLines>
  191.         <reservedFamily> 0 </reservedFamily>
  192.         <titleWidth>0</titleWidth>
  193.         <icon>0</icon>
  194.         <textAlign>left</textAlign>
  195.         <font>Geneva</font>
  196.         <textSize>12</textSize>
  197.         <textStyle>plain</textStyle>
  198.         <textHeight>16</textHeight>
  199.         <name>startingdate</name>
  200.         <script></script>
  201.     </part>
  202.     <part>
  203.         <id>15</id>
  204.         <type>button</type>
  205.         <visible> <true /> </visible>
  206.         <reserved5> 0 </reserved5>
  207.         <reserved4> 0 </reserved4>
  208.         <reserved3> 0 </reserved3>
  209.         <reserved2> 0 </reserved2>
  210.         <reserved1> 0 </reserved1>
  211.         <enabled> <true /> </enabled>
  212.         <rect>
  213.             <left>9</left>
  214.             <top>36</top>
  215.             <right>58</right>
  216.             <bottom>53</bottom>
  217.         </rect>
  218.         <style>transparent</style>
  219.         <showName> <true /> </showName>
  220.         <highlight> <false /> </highlight>
  221.         <autoHighlight> <false /> </autoHighlight>
  222.         <sharedHighlight> <true /> </sharedHighlight>
  223.         <family>0</family>
  224.         <titleWidth>0</titleWidth>
  225.         <icon>0</icon>
  226.         <textAlign>center</textAlign>
  227.         <font>Chicago</font>
  228.         <textSize>12</textSize>
  229.         <textStyle>plain</textStyle>
  230.         <name>Script:</name>
  231.         <script></script>
  232.     </part>
  233.     <part>
  234.         <id>18</id>
  235.         <type>field</type>
  236.         <visible> <false /> </visible>
  237.         <dontWrap> <false /> </dontWrap>
  238.         <dontSearch> <false /> </dontSearch>
  239.         <sharedText> <false /> </sharedText>
  240.         <fixedLineHeight> <false /> </fixedLineHeight>
  241.         <autoTab> <false /> </autoTab>
  242.         <lockText> <false /> </lockText>
  243.         <rect>
  244.             <left>162</left>
  245.             <top>73</top>
  246.             <right>319</right>
  247.             <bottom>240</bottom>
  248.         </rect>
  249.         <style>transparent</style>
  250.         <autoSelect> <false /> </autoSelect>
  251.         <showLines> <false /> </showLines>
  252.         <wideMargins> <false /> </wideMargins>
  253.         <multipleLines> <false /> </multipleLines>
  254.         <reservedFamily> 0 </reservedFamily>
  255.         <titleWidth>0</titleWidth>
  256.         <icon>0</icon>
  257.         <textAlign>left</textAlign>
  258.         <font>Geneva</font>
  259.         <textSize>12</textSize>
  260.         <textStyle>plain</textStyle>
  261.         <textHeight>16</textHeight>
  262.         <name>holding</name>
  263.         <script></script>
  264.     </part>
  265.     <part>
  266.         <id>24</id>
  267.         <type>field</type>
  268.         <visible> <true /> </visible>
  269.         <dontWrap> <false /> </dontWrap>
  270.         <dontSearch> <false /> </dontSearch>
  271.         <sharedText> <false /> </sharedText>
  272.         <fixedLineHeight> <false /> </fixedLineHeight>
  273.         <autoTab> <false /> </autoTab>
  274.         <lockText> <true /> </lockText>
  275.         <rect>
  276.             <left>10</left>
  277.             <top>3</top>
  278.             <right>369</right>
  279.             <bottom>30</bottom>
  280.         </rect>
  281.         <style>transparent</style>
  282.         <autoSelect> <false /> </autoSelect>
  283.         <showLines> <false /> </showLines>
  284.         <wideMargins> <false /> </wideMargins>
  285.         <multipleLines> <false /> </multipleLines>
  286.         <reservedFamily> 0 </reservedFamily>
  287.         <titleWidth>0</titleWidth>
  288.         <icon>0</icon>
  289.         <textAlign>left</textAlign>
  290.         <font>Geneva</font>
  291.         <textSize>9</textSize>
  292.         <textStyle>plain</textStyle>
  293.         <textHeight>12</textHeight>
  294.         <name></name>
  295.         <script>on mouseupclick at the loc of cd btn "more..."end mouseupon mouseenterhelper "Click here for additional information about this wheel."pass mouseenterend mouseenter</script>
  296.     </part>
  297.     <part>
  298.         <id>26</id>
  299.         <type>button</type>
  300.         <visible> <true /> </visible>
  301.         <reserved5> 0 </reserved5>
  302.         <reserved4> 0 </reserved4>
  303.         <reserved3> 0 </reserved3>
  304.         <reserved2> 0 </reserved2>
  305.         <reserved1> 0 </reserved1>
  306.         <enabled> <true /> </enabled>
  307.         <rect>
  308.             <left>327</left>
  309.             <top>21</top>
  310.             <right>371</right>
  311.             <bottom>36</bottom>
  312.         </rect>
  313.         <style>standard</style>
  314.         <showName> <true /> </showName>
  315.         <highlight> <false /> </highlight>
  316.         <autoHighlight> <true /> </autoHighlight>
  317.         <sharedHighlight> <true /> </sharedHighlight>
  318.         <family>0</family>
  319.         <titleWidth>0</titleWidth>
  320.         <icon>0</icon>
  321.         <textAlign>center</textAlign>
  322.         <font>Geneva</font>
  323.         <textSize>9</textSize>
  324.         <textStyle>plain</textStyle>
  325.         <name>More...</name>
  326.         <script>on mouseUpextrahelpend mouseUpon mouseenterhelper "Click here for additional information about this wheel."pass mouseenterend mouseenter</script>
  327.     </part>
  328.     <part>
  329.         <id>30</id>
  330.         <type>field</type>
  331.         <visible> <true /> </visible>
  332.         <dontWrap> <false /> </dontWrap>
  333.         <dontSearch> <false /> </dontSearch>
  334.         <sharedText> <false /> </sharedText>
  335.         <fixedLineHeight> <false /> </fixedLineHeight>
  336.         <autoTab> <false /> </autoTab>
  337.         <lockText> <true /> </lockText>
  338.         <rect>
  339.             <left>9</left>
  340.             <top>206</top>
  341.             <right>256</right>
  342.             <bottom>234</bottom>
  343.         </rect>
  344.         <style>transparent</style>
  345.         <autoSelect> <false /> </autoSelect>
  346.         <showLines> <false /> </showLines>
  347.         <wideMargins> <false /> </wideMargins>
  348.         <multipleLines> <false /> </multipleLines>
  349.         <reservedFamily> 0 </reservedFamily>
  350.         <titleWidth>0</titleWidth>
  351.         <icon>0</icon>
  352.         <textAlign>left</textAlign>
  353.         <font>Geneva</font>
  354.         <textSize>9</textSize>
  355.         <textStyle>plain</textStyle>
  356.         <textHeight>12</textHeight>
  357.         <name></name>
  358.         <script></script>
  359.     </part>
  360.     <part>
  361.         <id>25</id>
  362.         <type>field</type>
  363.         <visible> <false /> </visible>
  364.         <dontWrap> <false /> </dontWrap>
  365.         <dontSearch> <false /> </dontSearch>
  366.         <sharedText> <false /> </sharedText>
  367.         <fixedLineHeight> <false /> </fixedLineHeight>
  368.         <autoTab> <false /> </autoTab>
  369.         <lockText> <true /> </lockText>
  370.         <rect>
  371.             <left>10</left>
  372.             <top>38</top>
  373.             <right>372</right>
  374.             <bottom>279</bottom>
  375.         </rect>
  376.         <style>opaque</style>
  377.         <autoSelect> <false /> </autoSelect>
  378.         <showLines> <false /> </showLines>
  379.         <wideMargins> <false /> </wideMargins>
  380.         <multipleLines> <false /> </multipleLines>
  381.         <reservedFamily> 0 </reservedFamily>
  382.         <titleWidth>0</titleWidth>
  383.         <icon>0</icon>
  384.         <textAlign>left</textAlign>
  385.         <font>Geneva</font>
  386.         <textSize>9</textSize>
  387.         <textStyle>plain</textStyle>
  388.         <textHeight>12</textHeight>
  389.         <name>helptext</name>
  390.         <script>on mousedownhide meshow cd btn "more..."end mousedownon closefieldend closefield</script>
  391.     </part>
  392.     <content>
  393.         <layer>card</layer>
  394.         <id>18</id>
  395.         <text><html><head><title>Gallery & Artist Search</title></head><!--body tag--><HIDE_CLIENT# Macintosh><body bgcolor="#D2D2E3" link="#007AA7" vlink="#6144CF"><show><hide_client Macintosh><Macro body><show><!--end of body tag--><!--Masthead 1--><center><table width="468"><tr><td><center><img width=468 height=12 src="../masthead/interartsig.gif"><br><nobr><img align=top width=13 height=17 border=0 src="../masthead/noprev.gif"><a href="../default.html"><img align=top border=0 width=36 height=34 src="../masthead/hubbutton.gif"></a><a href="default.html"><img align=top border=0 width=36 height=34 src="../masthead/list.gif"></a><img align=top src="../masthead/spacer.gif"><a href="../realms/canyon.html"><img align=top border=0 width=210 height=53 src="../realms/canyon.gif"></a><img align=top src="../masthead/spacer.gif"><a href="search.html"><img align=top border=0 width=36 height=34 src="../masthead/onsearch.gif"></a><a href="http://script.interart.net/script.acgi$tour"><img align=top border=0 width=36 height=34 src="../masthead/tour.gif"></a><img align=top width=13 height=17 border=0 src="../masthead/nonext.gif"></nobr></center><!--End of Masthead 1--><center><h1>Galleries & Artists Search</h1></center><!--section picker--><p><table width=468><tr align=center valign=top><td><font size=-1><a href="../galleries/search.html">Galleries & Artists</a></font><HIDE_CLIENT# Mozilla><br><img width=14 height=7 src="../images/littlepointer.gif"><SHOW></td><td><font size=-1><a href="../jewelry/search.html">Jewelry</a></font></td><td><font size=-1><a href="../shops/search.html">Shops & Gifts</a></font></td><td><font size=-1><a href="../food/search.html">Food & Wine</a></font></td></font></tr></table><p><!--end of section picker-->This page lets you search for particular galleries, artists and artworks. Just use the popup menus to select the criteria that are important to you. You can fill out as much or as little of the form as you like.<form action="http://script.interart.net/script.acgi$search" method=post><p><center><b>Keywords:</b> <font size=-1>(separate multiple keywords with commas)<br><input type="text" name="keywords" size=60></center></td></tr></table><p><table width=468><tr><td align=right><b>Artist:</b></td> <td><input type=text name="person" width=40><p></td></tr><tr><td align=right><b>Category:</b></td><td><SELECT NAME="category"><OPTION>Any</OPTION><OPTION>3-dimensional</OPTION><OPTION>2-dimensional</OPTION></SELECT><p></td></tr><tr><td align=right><b>Medium:</b></td><td><SELECT NAME="mediumcategory"><OPTION>Any</OPTION><OPTION>Oil or Acrylic</OPTION><OPTION>Watercolor</OPTION><OPTION>Bronze</OPTION><OPTION>Stone</OPTION><OPTION>Metal</OPTION><OPTION>Glass</OPTION><OPTION>Ceramic</OPTION><OPTION>Mixed Media</OPTION><OPTION>Print</OPTION><OPTION>Photography</OPTION></SELECT><p></td></tr><tr><td align=right><b>Genre:</b></td><td><SELECT NAME="genre"><OPTION>Any</OPTION><OPTION>Realism</OPTION><OPTION>Non-objective</OPTION><OPTION>Landscape</OPTION><OPTION>Portrait</OPTION><OPTION>Comtemporary Southwest</OPTION><OPTION>Furniture</OPTION></SELECT><p></td></tr><tr><td align=right><b>Price Range:</b></td><td><SELECT NAME="price range"><OPTION>Any</OPTION><OPTION>less than $500</OPTION><OPTION>$500-$2K</OPTION><OPTION>$2K-5K</OPTION><OPTION>$5K-10K</OPTION><OPTION>$10K-50K</OPTION><OPTION>more than $50K</OPTION></SELECT><p></td></tr><tr><td align=right><b>Size Range:</b></td><td><SELECT NAME="sizerange"><OPTION>Any</OPTION><OPTION>Small</OPTION><OPTION>Medium</OPTION><OPTION>Large</OPTION><OPTION>Monumental</OPTION></SELECT><p></td></tr></table><p><table width="468"><tr><td><center><input type=submit value="Search"></center></form><!--Footer 1--><p><center><IMG width=468 height=52 border=0 SRC="../masthead/banner.gif" border=0 USEMAP="#banner"><macro usenetscape></center></td></tr></table></center><!--End of Footer 1--><MAP NAME="banner"><AREA SHAPE=rect COORDS="0,0, 50,51" HREF="../default.html"><AREA SHAPE=rect COORDS="52,0, 103,51" HREF="../attractions/default.html"><AREA SHAPE=rect COORDS="104,0, 147,51" HREF="../legend/default.html"><AREA SHAPE=rect COORDS= "325,0, 369,51" HREF="../ia/copyright.html"><AREA SHAPE=rect COORDS= "370,0, 414,52" HREF="http://script.interart.net/script.acgi$review"><AREA SHAPE=rect COORDS= "415,0, 468,51" HREF="../ia/contact.html"><AREA SHAPE=default  HREF="../welcome.html"></MAP></body></html></text>
  396.     </content>
  397.     <content>
  398.         <layer>card</layer>
  399.         <id>24</id>
  400.         <text>Modify your pages with your own AppleScripts! Write a script and click the button to run the script on every one of your HTML documents.</text>
  401.     </content>
  402.     <content>
  403.         <layer>card</layer>
  404.         <id>25</id>
  405.         <text><span class="style1">equires AppleScript. This wheel will open each one of your HTML documents in turn and modify it by running an AppleScript of your own creation. You can use if/then statements, repeat statements and other AppleScript terms to create </span><span class="style2">intelligent</span><span class="style1"> wheels for your own special wheels. Now the Grinder gives you unlimited flexibility and expandability!You only need type in the body portion of the script. It is not necessary to include an "on" or "end" statement. There are two constants you can use in your scripts. </span><span class="style2">filename</span><span class="style1"> represents the name of the HTML document currently being processed. </span><span class="style2">filecontents</span><span class="style1"> represents its text contents. Use these as variables in your script.At the end of your script, there is no need to write code that updates the HTML file. When the script is done, the contents of the HTML document will be automatically updated to whatever the value of </span><span class="style2">filecontents</span><span class="style1"> is when the script finishes running.Watch out for programming errors. Bugs will flash error messages, but no debugging is available.</span></text>
  406.     </content>
  407.     <content>
  408.         <layer>card</layer>
  409.         <id>27</id>
  410.         <text>None</text>
  411.     </content>
  412.     <content>
  413.         <layer>card</layer>
  414.         <id>30</id>
  415.         <text>Constants: filename = name of current file                 filecontents = contents of current file</text>
  416.     </content>
  417.     <name>Replace Tagged Text</name>
  418.     <script>on openstackif there is a scriptinglanguage "applescript"then enable cd btn 1elsebeepanswer "This wheel requires AppleScript."disable cd btn 1end ifpass openstackend openstackon converter thefile,thecontentsput filename(the long name of hypercard) into thehypercardput runscript(thefile,thecontents,thehypercard) into newcontentsif newcontents <> thecontentsthen replacefile thefile,newcontentsend converteron nonHTMLconverter thefileput empty into thecontentsput filename(the long name of hypercard) into thehypercardput runscript(thefile,thecontents,thehypercard) into newcontentsend nonHTMLconverterfunction checksyntaxif cd fld thetext is not empty thenput cd fld thetext into thescriptif chartonum(char 1 of thescript) is 9then delete char 1 of thescriptset the script of this bg to "on runscript(filename, filecontents, hypercard)"ﾂｬ&return & "set filename to filename as alias" &return& thescript &return&ﾂｬ"tell application hypercard to activate" &return& "return filecontents" &return& "end runscript"put the script of this bg into thescriptdelete line 1 to 2 of thescriptdelete last line of thescriptdelete last line of thescriptdelete last line of thescriptput thescript into cd fld thetextif chartonum(char 1 of thescript) is 9then return "OK"else return "Bad"else set the script of this bg to emptyend checksyntaxon resetwheelput empty into cd fld thetextset the script of this bg to emptyset the name of cd btn id 8 to "Check Syntax"pass resetwheelend resetwheel</script>
  419. </card>
  420.  
  421.  
  422.